home *** CD-ROM | disk | FTP | other *** search
/ Aminet 50 / Aminet 50 (2002)(GTI - Schatztruhe)[!][Aug 2002].iso / Aminet / util / time / DRemind.lha / DRemind / DRemind-Install next >
Text File  |  2001-03-19  |  16KB  |  751 lines
  1. ; $VER: Installation script for DRemind 1.0 (16.09.2000)
  2. ; © Alexander Döller
  3. ; Created with GoldED 6.17
  4. ; Minor modifications made by Daniel Westerberg
  5.  
  6. ;=============================================================================
  7. ; English strings
  8.  
  9. (if (= @language "english")
  10. (
  11. (set def_lang 0)
  12.  
  13. (set #incorectos
  14. (cat "Incorrect OS version (software requires OS 37 or better )!"
  15. ))
  16. (set #error1
  17. (cat "An error has occurred during installation. Please check the log file to understand the error."
  18. ))
  19. (set #insmode
  20. (cat "\nChoose the installation mode:"
  21. ))
  22. (set #installtext
  23. (cat "Install"
  24. ))
  25. (set #uninstalltext
  26. (cat "Uninstall"
  27. ))
  28. (set #inspath
  29. (cat "Please choose the installation path for the DRemind-Commodity:\n('SYS:WBStartup' is recommend if you want to start DRemind at startup time.)"
  30. ))
  31. (set #helpinspath
  32. (cat "If you specify 'SYS:WBStartup' the system will start DRemind at startup for you.\nIf you choose to install it to an other dir you will have to start it manually."
  33. ))
  34. (set #inspathprefs
  35. (cat "Please choose the installation path for the DRemind-Preferences program:\n('SYS:Prefs' is recommend if you want DRemind to be able to start the preferences program.)"
  36. ))
  37. (set #inspathprefshelp
  38. (cat "If you choose to install it to an other dir you will have to call DRemindPrefs yourself every time you want to change the prefs."
  39. ))
  40. (set #confdir
  41. (cat "Please choose the directory for the configuration file: ('ENVARC' = default)\nNote: If you set any other destination than ENVARC: don't forget to change the dir in DRemindPrefs as well!"
  42. ))
  43. (set #wichimage
  44. (cat "Which image to install?"
  45. ))
  46. (set #copyimage
  47. (cat "Copying image for DRemind ..."
  48. ))
  49. (set #wichicon
  50. (cat "Which icons to install?"
  51. ))
  52. (set #copyicon
  53. (cat "Copying icons for DRemind ..."
  54. ))
  55. (set #selectlanguage
  56. (cat "\nPlease select the language to install:\n"
  57. ))
  58. (set #language00
  59. (cat "English"
  60. ))
  61. (set #language01
  62. (cat "German"
  63. ))
  64. (set #language02
  65. (cat "Spanish"
  66. ))
  67. (set #language03
  68. (cat "French"
  69. ))
  70. (set #language04
  71. (cat "Hungarian"
  72. ))
  73. (set #language05
  74. (cat "Polish"
  75. ))
  76. (set #whatelse
  77. (cat "What to install else?"
  78. ))
  79. (set #documentation
  80. (cat "Documentation"
  81. ))
  82. (set #otherimages
  83. (cat "Other images for DRemind"
  84. ))
  85. (set #transdev
  86. (cat "Translation (for developers)"
  87. ))
  88. (set #readmefiles
  89. (cat "Readme files"
  90. ))
  91. (set #dirstuff
  92. (cat "Please choose the directory for the DRemind stuff:\n(A new dir will be created.)"
  93. ))
  94. (set #onlyremove
  95. (cat "DRemind can only be removed from the system if was installed with the default settings for the dirs!"
  96. ))
  97. (set #insaddfiles
  98. (cat "Did you install the additional files?"
  99. ))
  100. (set #yes
  101. (cat "Yes"
  102. ))
  103. (set #no
  104. (cat "No"
  105. ))
  106. (set #choosestuffdir
  107. (cat "Please choose the directory where you installed the DRemind stuff:"
  108. ))
  109. (set #uninscompl
  110. (cat "Uninstallation completed."
  111. ))
  112. )
  113. )
  114. ;===============================================================================
  115. ; German strings translated 19.03.2001 by Axel Greve <Axel.Greve@icn.siemens.de>
  116.  
  117. (if (= @language "deutsch")
  118. (
  119. (set def_lang 1)
  120.  
  121. (set #incorectos
  122. (cat "Inkorrekte OS-Version (Software benötigt OS 37 oder besser) !"
  123. ))
  124. (set #error1
  125. (cat "Während der Installation ist ein Fehler aufgetreten. Bitte überprüfen sie die Log-Datei, um den Fehler zu verstehen."
  126. ))
  127. (set #insmode
  128. (cat "\nWählen Sie den Installationsmodus:"
  129. ))
  130. (set #installtext
  131. (cat "Installieren"
  132. ))
  133. (set #uninstalltext
  134. (cat "De-Installieren"
  135. ))
  136. (set #inspath
  137. (cat "Bitte wählen sie den Installationspfad für das DRemind-Commodity:\n('SYS:WBStartup' wird empfohlen, wenn DRemind beim Booten starten soll.)"
  138. ))
  139. (set #helpinspath
  140. (cat "Wenn Sie 'SYS:WBStartup' spezifizieren, startet das System DRemind beim Booten für Sie.\nWenn Sie einen anderen Installationspfad wählen, müssen Sie es manuell starten."
  141. ))
  142. (set #inspathprefs
  143. (cat "Bitte wählen sie den Installationspfad für das DRemind-Voreinsteller Programm:\n('SYS:Prefs' wird empfohlen, wenn Sie möchten, dass DRemind das Voreinsteller-Programm starten kann.)"
  144. ))
  145. (set #inspathprefshelp
  146. (cat "Wenn Sie einen anderen Installationspfad wählen, müssen Sie es immer dann manuell starten, wenn Sie die Einstellungen ändern wollen."
  147. ))
  148. (set #confdir
  149. (cat "Bitte wählen Sie das Verzeichnis für die Konfigurationsdatei: ('ENVARC' = voreingestellt)\nAnmerkung: Vergessen Sie nicht, das Verzeichnis auch in DRemind zu ändern, wenn Sie einen anderen Pfad als ENVARC: verwenden!"
  150. ))
  151. (set #wichimage
  152. (cat "Welches Bild installieren?"
  153. ))
  154. (set #copyimage
  155. (cat "Kopiere Bild für DRemind ..."
  156. ))
  157. (set #wichicon
  158. (cat "Welche Piktogramme installieren?"
  159. ))
  160. (set #copyicon
  161. (cat "Kopiere Piktogramme für DRemind ..."
  162. ))
  163. (set #selectlanguage
  164. (cat "\nBitte wählen Sie die zu installierende Sprache:\n"
  165. ))
  166. (set #language00
  167. (cat "Englisch"
  168. ))
  169. (set #language01
  170. (cat "Deutsch"
  171. ))
  172. (set #language02
  173. (cat "Spanisch"
  174. ))
  175. (set #language03
  176. (cat "Französisch"
  177. ))
  178. (set #language04
  179. (cat "Ungarisch"
  180. ))
  181. (set #language05
  182. (cat "Polnisch"
  183. ))
  184. (set #whatelse
  185. (cat "Was sonst installieren?"
  186. ))
  187. (set #documentation
  188. (cat "Dokumentation"
  189. ))
  190. (set #otherimages
  191. (cat "Andere Bilder für DRemind"
  192. ))
  193. (set #transdev
  194. (cat "Übersetzung für Entwickler)"
  195. ))
  196. (set #readmefiles
  197. (cat "ReadMe-Dateien"
  198. ))
  199. (set #dirstuff
  200. (cat "Bitte wählen Sie das Verzeichnis für das DRemind-Material:\n(Ein neues Verzeichnis wird erstellt.)"
  201. ))
  202. (set #onlyremove
  203. (cat "DRemind kann nur vom System entfernt werden, wenn es in den voreingestellten Pfaden installiert wurde!"
  204. ))
  205. (set #insaddfiles
  206. (cat "Haben Sie die zusätzlichen Dateien installiert?"
  207. ))
  208. (set #yes
  209. (cat "Ja"
  210. ))
  211. (set #no
  212. (cat "Nein"
  213. ))
  214. (set #choosestuffdir
  215. (cat "Bitte wählen sie das Verzeichnis, in dem Sie das DRemind-Material installiert haben:"
  216. ))
  217. (set #uninscompl
  218. (cat "De-Installation vollständig."
  219. ))
  220. )
  221. )
  222. ;=============================================================================
  223. ; Spanish strings
  224.  
  225. (if (= @language "español")
  226. (
  227. (set def_lang 2)
  228. )
  229. )
  230. ;=============================================================================
  231. ; French strings
  232.  
  233. (if (= @language "français")
  234. (
  235. (set def_lang 3)
  236. )
  237. )
  238. ;=============================================================================
  239. ; Hungarian strings are translated by Oborzin <oborzin@freemail.hu>
  240.  
  241. (if (= @language "magyar")
  242. (
  243. (set def_lang 4)
  244.  
  245. (set #incorectos
  246. (cat "Nem megfelelõ az OS verzió (OS 37 vagy újabb kell)!"
  247. ))
  248. (set #error1
  249. (cat "Hiba történt installáláskor. Ellenõrizd a log fájlt!"
  250. ))
  251. (set #insmode
  252. (cat "\nVálaszd ki hogy mit csináljak:"
  253. ))
  254. (set #installtext
  255. (cat "Install"
  256. ))
  257. (set #uninstalltext
  258. (cat "Uninstall"
  259. ))
  260. (set #inspath
  261. (cat "Válassz útvonalat a DRemind-Commodity-nak.\n('SYS:WBStartup' ajánlott)" 
  262. ))
  263. (set #helpinspath
  264. (cat " Ha a 'SYS:WBStartup' könyvtárat választod, a DRemind automatikusan elindul bootoláskor.\nHa másik helyre másolod, akkor az indításról neked kell gondoskodni!"
  265. ))
  266. (set #inspathprefs
  267. (cat "Válassz útvonalat a DRemind-Preferences programnak.\n('SYS:Prefs' ajánlott)"
  268. ))
  269. (set #inspathprefshelp
  270. (cat "Ha másik útvonalat választasz, a DRemind nem tudja majd elindítani a Prefs programot, így azt neked kell majd külön elindítani!"
  271. ))
  272. (set #confdir
  273. (cat "Válassz útvonalat a konfig-fájlnak. ('ENVARC' az alapbeállítás)\nHa más útvonalat választasz, állítsd be a Prefs programban!"
  274. ))
  275. (set #wichimage
  276. (cat "Melyik képet választod?"
  277. ))
  278. (set #copyimage
  279. (cat "Kép másolása..."
  280. ))
  281. (set #wichicon
  282. (cat "Melyik ikont választod?"
  283. ))
  284. (set #copyicon
  285. (cat "Ikonok másolása ..."
  286. ))
  287. (set #selectlanguage
  288. (cat "\nVálassz nyelvet:\n"
  289. ))
  290. (set #language00
  291. (cat "angol"
  292. ))
  293. (set #language01
  294. (cat "német"
  295. ))
  296. (set #language02
  297. (cat "spanyol"
  298. ))
  299. (set #language03
  300. (cat "francia"
  301. ))
  302. (set #language04
  303. (cat "magyar"
  304. ))
  305. (set #language05
  306. (cat "lengyel"
  307. ))
  308. (set #whatelse
  309. (cat "Még mit installáljak?"
  310. ))
  311. (set #documentation
  312. (cat "Dokumentáció"
  313. ))
  314. (set #otherimages
  315. (cat "Képek a DRemind-hez"
  316. ))
  317. (set #transdev
  318. (cat "Fordítás (fejlesztõknek)"
  319. ))
  320. (set #readmefiles
  321. (cat "Readme fájlok"
  322. ))
  323. (set #dirstuff
  324. (cat "Válassz könyvtárat a DRemind kiegészítõknek:\n(Nyitok neki egy új könyvtárat.)"
  325. ))
  326. (set #onlyremove
  327. (cat "Csak akkor tudom letörölni a DRemind-et a rendszeredrõl, ha az alapbeállítás szerint installáltad fel!"
  328. ))
  329. (set #insaddfiles
  330. (cat "A kiegészítõket is felinstalláltad?"
  331. ))
  332. (set #yes
  333. (cat "Igen"
  334. ))
  335. (set #no
  336. (cat "Nem"
  337. ))
  338. (set #choosestuffdir
  339. (cat "Válaszd ki a DRemind kiegészítõk könyvtárját!"
  340. ))
  341. (set #uninscompl
  342. (cat "A DRemind törlése befejezve."
  343. ))
  344. )
  345. )
  346. ;=============================================================================
  347. ; Polish strings
  348.  
  349. (if (= @language "polski")
  350. (
  351. (set def_lang 5)
  352. )
  353. )
  354. ; 
  355. ; OTHER TRANSLATIONS HERE:
  356. ;=============================================================================
  357. ; START
  358. ;=============================================================================
  359.  
  360. (set @default-dest "ram:")
  361. (complete 0)
  362.  
  363. (if (< (/ (getversion) 65536) 37)
  364.     (
  365.         (abort #incorectos)
  366.     )
  367. )
  368.  
  369. ; error handling
  370.  
  371. (onerror
  372.     (if (> @ioerr 0)
  373.         (
  374.             (message
  375.                 (#error1)
  376.             )
  377.         )
  378.     )
  379.     (exit (quiet))
  380. )
  381.  
  382. (set #installmode
  383.   (askbool
  384.     (prompt #insmode)
  385.     (help @askbool-help)
  386.     (choices
  387.              #installtext
  388.              #uninstalltext
  389.              
  390.     )
  391.     (default 1)
  392.   )
  393. )
  394.  
  395. (if (= #installmode 1)
  396.  
  397.  ; normal installation
  398.  
  399.     (
  400.         (welcome)
  401.  
  402.      ; --- insert your code below ---
  403.  
  404.  
  405.    (set @CDty-dest
  406.      (askdir
  407.       (prompt #inspath)
  408.       (help #helpinspath)
  409.       (default "SYS:WBStartup/")
  410.      )
  411.    )
  412.  
  413. (COMPLETE 10)
  414.  
  415.    (set @Prefs-dest
  416.      (askdir
  417.       (prompt #inspathprefs)
  418.       (help #inspathprefshelp)
  419.       (default "SYS:Prefs/")
  420.      )
  421.    )
  422.  
  423. (COMPLETE 20)
  424.  
  425.    (copyfiles
  426.        (source "DRemind/DRemind")
  427.        (dest @CDty-dest)
  428.        (infos)
  429.        (optional "oknodelete" "force" "askuser")
  430.    )
  431.  
  432. (COMPLETE 30)
  433.  
  434.  
  435.    (copyfiles
  436.        (source "DRemind/DRemindPrefs")
  437.        (dest @Prefs-dest)
  438.        (infos)
  439.        (optional "oknodelete" "force" "askuser")
  440.    )
  441.  
  442. (COMPLETE 40)
  443.  
  444.    (set image_dir
  445.      (askdir
  446.       (prompt #confdir)
  447.       (help @askdir-help)
  448.       (default "ENVARC:")
  449.      )
  450.    )
  451.  
  452. (COMPLETE 50)
  453.  
  454. ;        uncomment if you want to show a picture of the available images
  455. ;   (run "run sys:utilities/multiview DRemind/DRemind.image" (safe))
  456.  
  457.    (set #result
  458.      (askchoice
  459.        (prompt #wichimage)
  460.        (help @askchoice-help)
  461.        (choices
  462.  
  463.           "1. - Amiga Boing"
  464.           "2. - New Hand in B/W"
  465.           "3. - New Hand in Red"
  466.           "4. - The Hand (default)"
  467.        )
  468.        (default 3)
  469.      )
  470.    )
  471.  
  472.  
  473.    (if (= #result 0)
  474.        (set image_source "DRemind/Images/Boing/")
  475.    )
  476.    (if (= #result 1)
  477.        (set image_source "DRemind/Images/NewHand_BW/")
  478.    )
  479.    (if (= #result 2)
  480.        (set image_source "DRemind/Images/NewHand_Red/")
  481.    )
  482.    (if (= #result 3)
  483.        (set image_source "DRemind/Images/TheHand/")
  484.    )
  485.  
  486.  
  487.    (working #copyimage)
  488.  
  489.    (copyfiles
  490.        (source (tackon image_source "DRemind.image"))
  491.        (dest image_dir)
  492.        (optional "nofail")
  493.    )
  494.  
  495. (COMPLETE 60)
  496.  
  497.    (set #result
  498.      (askchoice
  499.        (prompt #wichicon)
  500.        (help @askchoice-help)
  501.        (choices
  502.  
  503.           "1. - Standard 4-colour"
  504.           "2. - MagicWB"
  505.           "3. - OS3.5 GlowIcons"
  506.        )
  507.        (default 2)
  508.      )
  509.    )
  510.  
  511.  
  512.    (if (= #result 0)
  513.        (set image_source "DRemind/Icons/Old/")
  514.    )
  515.    (if (= #result 1)
  516.        (set image_source "DRemind/Icons/MagicWB")
  517.    )
  518.    (if (= #result 2)
  519.        (set image_source "DRemind/Icons/OS3.5/")
  520.    )
  521.  
  522.    (working #copyicon)
  523.  
  524.    (copyfiles
  525.        (source (tackon image_source "DRemind.info"))
  526.        (dest @CDty-dest)
  527.        (optional "nofail")
  528.    )
  529.    (copyfiles
  530.        (source (tackon image_source "DRemindPrefs.info"))
  531.        (dest @Prefs-dest)
  532.        (optional "nofail")
  533.    )
  534.    
  535.  
  536. (COMPLETE 70)
  537.  
  538.    (set #result
  539.      (askchoice
  540.        (prompt #selectlanguage)
  541.        (help @askchoice-help)
  542.        (choices
  543.  
  544.           #language00
  545.           #language01
  546.           #language02
  547.           #language03
  548.           #language04
  549.           #language05
  550.        )
  551.        (default #def_lang)
  552.      )
  553.    )
  554.  
  555.    (if (= #result 0)
  556.        (set language "english")
  557.    )
  558.    (if (= #result 1)
  559.        (set language "deutsch")
  560.    )
  561.    (if (= #result 2)
  562.        (set language "español")
  563.    )
  564.    (if (= #result 3)
  565.        (set language "français")
  566.    )
  567.    (if (= #result 4)
  568.        (set language "magyar")
  569.    )
  570.    (if (= #result 5)
  571.        (set language "polski")
  572.    )
  573.  
  574.    (copyfiles
  575.        (source (tackon "DRemind/Catalogs" language))
  576.        (dest (tackon "LOCALE:Catalogs" language))
  577.        (pattern "#?")
  578.        (optional "nofail" "force" "askuser")
  579.    )
  580.  
  581. (COMPLETE 80)
  582.  
  583.    (set #result
  584.      (askoptions
  585.        (prompt #whatelse)
  586.        (help @askoptions-help)
  587.        (choices
  588.  
  589.           #documentation
  590.           #otherimages
  591.           #transdev
  592.           #readmefiles
  593.        )
  594.        (default (+ 1 2 4 8))
  595.      )
  596.    )
  597.  
  598.    (if (= #result 0)
  599.        (exit)
  600.    )
  601.  
  602.    (set dest_dir
  603.      (askdir
  604.       (prompt #dirstuff)
  605.       (help @askdir-help)
  606.       (default "SYS:Utilities/")
  607.       (newpath)
  608.      )
  609.    )
  610.  
  611.    (set @default-dest dest_dir)
  612.  
  613. (COMPLETE 90)
  614.  
  615.    (set dest_dir (tackon dest_dir "DRemind"))
  616.  
  617.    (if (in #result 0)
  618.      (copyfiles
  619.        (source "DRemind/DRemind.Guide")
  620.        (dest dest_dir)
  621.        (infos)
  622.        (optional "oknodelete" "force" "askuser")
  623.      )
  624.    )
  625.  
  626.    (if (in #result 1)
  627.      (copyfiles
  628.        (source "DRemind/Images/")
  629.        (dest (tackon dest_dir "Images"))
  630.        (infos)
  631.        (pattern "#?")
  632.        (optional "oknodelete" "force" "askuser")
  633.      )
  634.    )
  635.  
  636.    (if (in #result 2)
  637.      (copyfiles
  638.        (source "DRemind/Translations/")
  639.        (dest (tackon dest_dir "Translations"))
  640.        (infos)
  641.        (files)
  642.        (pattern "#?")
  643.        (optional "oknodelete" "force" "askuser")
  644.      )
  645.    )
  646.  
  647.    (if (in #result 3)
  648.      (copyfiles
  649.        (source "DRemind/")
  650.        (dest dest_dir)
  651.        (infos)
  652.        (pattern "#?.Readme")
  653.        (optional "oknodelete" "force" "askuser")
  654.      )
  655.    )
  656.  
  657.  
  658. (COMPLETE 100)
  659.  
  660. ; --- end of your code ---
  661.  
  662.         (exit)
  663.     )
  664.  
  665.  ; uninstall application
  666.  
  667.     (
  668.      ; --- insert your code below ---
  669.  
  670.    (message #onlyremove)
  671.  
  672.    (delete "SYS:WBStartup/DRemind")
  673.    (delete "SYS:WBStartup/DRemind.info")
  674.  
  675. (COMPLETE 20)
  676.  
  677.    (delete "SYS:Prefs/DRemindPrefs")
  678.    (delete "SYS:Prefs/DRemindPrefs.info")
  679.  
  680. (COMPLETE 40)
  681.  
  682. ; remove all available language files
  683.    (delete (cat "LOCALE:Catalogs/english/DRemind.catalog"))
  684.    (delete (cat "LOCALE:Catalogs/english/DRemindPrefs.catalog"))
  685.  
  686.    (delete (cat "LOCALE:Catalogs/deutsch/DRemind.catalog"))
  687.    (delete (cat "LOCALE:Catalogs/deutsch/DRemindPrefs.catalog"))
  688.  
  689.    (delete (cat "LOCALE:Catalogs/español/DRemind.catalog"))
  690.    (delete (cat "LOCALE:Catalogs/español/DRemindPrefs.catalog"))
  691.  
  692.    (delete (cat "LOCALE:Catalogs/français/DRemind.catalog"))
  693.    (delete (cat "LOCALE:Catalogs/français/DRemindPrefs.catalog"))
  694.  
  695.    (delete (cat "LOCALE:Catalogs/magyar/DRemind.catalog"))
  696.    (delete (cat "LOCALE:Catalogs/magyar/DRemindPrefs.catalog"))
  697.  
  698.    (delete (cat "LOCALE:Catalogs/polski/DRemind.catalog"))
  699.    (delete (cat "LOCALE:Catalogs/polski/DRemindPrefs.catalog"))
  700.  
  701. (COMPLETE 60)
  702.  
  703.    (delete "ENVARC:DRemind.image")
  704.    (delete "ENVARC:DRemind.prefs")
  705.    (delete "ENVARC:DRemind.temp")
  706.    (delete "ENVARC:DRemind.temps")
  707.  
  708. ; remove MUI-settings as well
  709.    (delete "ENVARC:mui/DREMIND.prefs")
  710.    (delete "ENVARC:mui/DRPREFS.1.prefs")
  711.  
  712.  
  713.    (set #result
  714.        (askbool
  715.            (prompt #insaddfiles)
  716.            (help @askbool-help)
  717.            (choices
  718.  
  719.                #yes
  720.                #no
  721.            )
  722.            (default 1)
  723.        )
  724.    )
  725.  
  726. (COMPLETE 80)
  727.  
  728.    (if (= #result 1)
  729.    (
  730.      (set dest_dir
  731.        (askdir
  732.          (prompt #choosestuffdir)
  733.          (help @askdir-help)
  734.          (default "SYS:Utilities")
  735.          (newpath)
  736.        )
  737.      )
  738.      (run (cat "C:delete >NIL: " dest_dir "/DRemind ALL QUIET FORCE"))
  739.      (delete (cat dest_dir "/DRemind.info"))
  740.    ) )
  741.    
  742. (COMPLETE 100)
  743.  
  744. ; -- end of your code ---
  745.  
  746.         (message #uninscompl)
  747.         (exit (quiet))
  748.     )
  749. )
  750.  
  751.